Public Class TaxPI
    Private _dblAmount As Double = 0
    Private _strType As String = String.Empty
    Private _dblValue As Double = 0
    Private _intID As Integer = 0
    Private _Name As String = String.Empty
    Private _strApplyTo As String = String.Empty

    Public Property TaxType() As String
        Get
            Return _strType
        End Get
        Set(ByVal value As String)
            _strType = value
        End Set
    End Property

    Public Property TaxAmount() As Double
        Get
            Return _dblAmount
        End Get
        Set(ByVal value As Double)
            _dblAmount = value
        End Set
    End Property

    Public Property TaxValue() As Double
        Get
            Return _dblValue
        End Get
        Set(ByVal value As Double)
            _dblValue = value
        End Set
    End Property

    Public Property TaxID() As Integer
        Get
            Return _intID
        End Get
        Set(ByVal value As Integer)
            _intID = value
        End Set
    End Property

    Public Property TaxName() As String
        Get
            Return _Name
        End Get
        Set(ByVal value As String)
            _Name = value
        End Set
    End Property

    Public Property ApplyTo() As String
        Get
            Return _strApplyTo
        End Get
        Set(ByVal value As String)
            _strApplyTo = value
        End Set
    End Property
End Class
